home *** CD-ROM | disk | FTP | other *** search
/ Aminet 8 / Aminet 8 (1995)(GTI - Schatztruhe)[!][Oct 1995].iso / Tools / Useful / ARCHandler / S / WhichLhA < prev   
Text File  |  1994-07-06  |  146b  |  10 lines
  1. Which >NIL: LhA
  2. If WARN
  3.   SetEnv lhapath ""
  4. Else
  5.   SetEnv lhapath `Which LhA`
  6.   If "$lhapath" EQ "RES LhA"
  7.     SetEnv lhapath "LhA"
  8.   EndIf
  9. EndIf
  10.